ORCA/Pascal 1.4.1
Copyright 1987,1988,1991, Byte Works, Inc.

  DRAWPROC
  CHECKDATA
  GETPRIVATE
  REM_OPEN
  REM_CLOSE
  REM_WRITE
  REM_EVENT
  REM_ACTIVATE
  REM_GETLINK
  REM_VIDMODE
 491     private     privateDataHndl;
****                               ^ illegal symbol
****                                ^ ':' expected
****                                ^ error in type
 493     winP = grafPortPtr(p^.windowPtr);
****        ^ identifier declared twice
****          ^ illegal symbol
****                                     ^ ':' expected
****                                     ^ error in type
 494     private = getPrivate(winP);
****           ^ identifier declared twice
****             ^ illegal symbol
****                               ^ ':' expected
****                               ^ error in type
 495     ctlH = GetCtlHandleFromID(winP, 1L);
****        ^ identifier declared twice
****          ^ illegal symbol
****                                     ^ digit expected
****                                     ^ identifier expected
****                                     ^ illegal symbol
****                                        ^ ':' expected
****                                        ^ error in type
 496     txtLength = TEGetText($0018, @txtData, 0, 0, 0, ctlH);
****             ^ identifier declared twice
****               ^ illegal symbol
****                                  ^ identifier expected
****                                  ^ illegal symbol
****                                            ^ identifier expected
****                                            ^ illegal symbol
****                                               ^ identifier expected
****                                               ^ illegal symbol
****                                                  ^ identifier expected
****                                                          ^ further errors supressed
 497     HideControl(ctlH);
****                ^ illegal symbol
****                      ^ ':' expected
****                      ^ error in type
 498     DisposeControl(ctlH);
****                   ^ illegal symbol
****                         ^ ':' expected
****                         ^ error in type
 499     winH = paramListHndl(private^^.winTempH);
****        ^ identifier declared twice
****          ^ illegal symbol
****                                             ^ ':' expected
****                                             ^ error in type
 500     ctlH = NewControl2(winP, 1, winH^^.wStorage);
****        ^ identifier declared twice
****        ^ identifier declared twice
****        ^ identifier declared twice
****          ^ illegal symbol
****                              ^ identifier expected
****                              ^ illegal symbol
****                                    ^ identifier declared twice
****                                    ^ identifier declared twice
****                                     ^ illegal symbol
****                                                 ^ further errors supressed
 502     /* wStorage uis actually the control template handle */
****     ^ illegal symbol
****                   ^ illegal symbol
 504     TESetText($0008, txtData, 0, 0, 0, ctlH);
****                            ^ identifier declared twice
****                               ^ identifier expected
****                               ^ illegal symbol
****                                  ^ identifier expected
****                                  ^ illegal symbol
****                                     ^ identifier expected
****                                     ^ illegal symbol
****                                           ^ identifier declared twice
****                                           ^ identifier declared twice
****                                             ^ further errors supressed
 506     SetFrameColor(p^.wColorPtr, p^.windowPtr);
****                  ^ illegal symbol
****                                 ^ identifier declared twice
****                                  ^ illegal symbol
****                                              ^ ':' expected
****                                              ^ error in type
 507     REM_VidMode := 0;
****                  ^ illegal symbol
****                     ^ ':' expected
****                     ^ error in type
 508 END;
****   ^ illegal symbol
 517 FUNCTION REM_Print;
****                   ^ missing result type in function declaration
   REM_PRINT
 520     REM_Print := 0;
****                   ^ type conflict of operands
 536 FUNCTION REM_STARTUP;
****                     ^ missing result type in function declaration
   REM_STARTUP
 538     fUserID := p^.edUserID;
****                          ^ no such field in this record
 539     edResFileID := p^.edResFileID;
****                                 ^ no such field in this record
 540     shResFileID := p^.shResFileID;
****                                 ^ no such field in this record
 541     fdResFileID := p^.fdResFileID;
****                                 ^ no such field in this record
 545     REM_STARTUP := 0;
****                     ^ type conflict of operands
 559 FUNCTION REM_SHUTDOWN;
****                      ^ missing result type in function declaration
   REM_SHUTDOWN
 563     REM_SHUTDOWN := 0;      { all you need, read TBR-1, page 12-23!	}
****                      ^ type conflict of operands
 565 END.
****   ^ 'begin' expected
****    ^ illegal symbol
Unexpected end of file
**** forward ref not resolved: REM_SHUTDOWN
**** forward ref not resolved: REM_STARTUP
**** forward ref not resolved: REM_PRINT
 566 
****^ ';' expected
****^ illegal symbol
****^ no assignment to function found
****^ error in declaration part
****^ 'end' expected
****^ '.' expected


